home *** CD-ROM | disk | FTP | other *** search
/ The Original Shareware 1.1 / The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso / 21 / bethoven.zip / LVB.BAT < prev    next >
DOS Batch File  |  1989-06-07  |  2KB  |  68 lines
  1. echo off
  2. if %1x==x goto MENU
  3. if exist %1.exe goto CHOOSER
  4. goto %1
  5. :DISK
  6. minuet-g
  7. molinara
  8. 7-var
  9. spadagio
  10. moonleit
  11. goto FINIS
  12. :DOS
  13. REM  LVB DOS plays all music files in DOS order.  That is to say:
  14. REM  This option will play all .EXE files in the same directory.
  15. REM  Use this option WITH CARE in directories containing
  16. REM  non-music EXE files.
  17. for %%V IN (*.exe) DO %%V
  18. goto FINIS
  19. :CHOOSER
  20. %1
  21. SHIFT
  22. if %1c==c goto FINIS
  23. goto CHOOSER
  24. :MENU
  25. cls
  26. echo    
  27. echo  WELCOME TO PIANOMAN DOES BEETHOVEN ==================================
  28. echo   
  29. echo   This disk contains the following five music files.  Enter any one
  30. echo   filename at the prompt to play the corresponding musical work:
  31. echo   
  32. echo      MINUET-G    Minuet in G-major (about 2 minutes)
  33. echo      MOLINARA    Theme and Six Variations on an Aria (5½ min)
  34. echo      7-VAR       Theme and Seven Variations on the National Song (9 min)
  35. echo      SPADAGIO    Sonata Pathetique:  Adagio cantabile (4 min)
  36. echo      MOONLEIT    The Moonlight Sonata:  Adagio Sostenuto (5½ min)
  37. echo   
  38. echo    Enter "LVB DISK" to play the "Pianoman Does Beethoven" disk in its
  39. echo    entirety (about 26 minutes).  
  40. echo    
  41. echo    You may specify more than one file at a time and the order in which
  42. echo    they will be played (even other files in the same directory):
  43. echo   
  44. echo        Syntax:   LVB [filename1] [filename2] [filename3] . . .
  45. echo   
  46. echo        Example:  LVB moonleit minuet-g 7-var scarlat7 . . .
  47. echo   
  48. echo  PRESS F3 TO RE-ENTER THE LVB COMMAND =================================
  49. echo   
  50. goto END
  51. :FINIS
  52. cls
  53. echo   
  54. echo   
  55. echo           Thanks for listening in . . .
  56. echo   
  57. echo           I would appreciate hearing any comments or questions
  58. echo           about this or any other of my music disks.
  59. echo   
  60. echo   
  61. echo               ≡≡≡≡≡≡    Nancy Moran                   ≡≡≡≡≡≡
  62. echo               ≡≡≡≡≡≡    607 Park Avenue               ≡≡≡≡≡≡
  63. echo               ≡≡≡≡≡≡    Baltimore, Maryland  21201    ≡≡≡≡≡≡
  64. echo               ≡≡≡≡≡≡    U.S.A.                        ≡≡≡≡≡≡
  65. echo   
  66. echo   
  67. :END
  68.